home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / hypercar / science / ptable12.cpt / Periodic Table 1.1, HC1.2.1 / background_5203.txt < prev    next >
Text File  |  1992-05-09  |  14KB  |  479 lines
  1. -- background: 5203 from stack: in.1
  2. -- bmap block id: 32307
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 4 (button)
  9. -- low flags: 00
  10. -- high flags: A006
  11. -- rect: left=202 top=221 right=244 bottom=308
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Boiling Point
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   Global sortName
  23.   Global sortName2
  24.   put "BoilPt" into sortName
  25.   put "Boiling Point" into sortName2
  26.   set hilite of background button "Atomic Weight" to false
  27.   set hilite of background button "Atomic Radius" to false
  28.   set hilite of background button "Gram Atomic Vol." to false
  29.   set hilite of background button "Rel. Electroneg." to false
  30.   set hilite of background button "First Ioniz. Pot." to false
  31.   set hilite of background button "Elect. Resistivity" to false
  32.   set hilite of background button "Density" to false
  33.   set hilite of background button "Melting Point" to false
  34.   set hilite of background button "Atomic Number" to false
  35. end mouseUp
  36.  
  37.  
  38.  
  39. -- part 5 (button)
  40. -- low flags: 00
  41. -- high flags: E006
  42. -- rect: left=202 top=42 right=65 bottom=324
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 0
  47. -- text size: 12
  48. -- style flags: 0
  49. -- line height: 16
  50. -- part name: Atomic Number
  51. ----- HyperTalk script -----
  52. on mouseUp
  53.   Global sortName
  54.   Global sortName2
  55.   put "AtomicNo" into sortName
  56.   put "Atomic Number" into sortName2
  57.   send putName to bkgnd "elementInfo"
  58.   set hilite of background button "Atomic Weight" to false
  59.   set hilite of background button "Atomic Radius" to false
  60.   set hilite of background button "Gram Atomic Vol." to false
  61.   set hilite of background button "Rel. Electroneg." to false
  62.   set hilite of background button "First Ioniz. Pot." to false
  63.   set hilite of background button "Elect. Resistivity" to false
  64.   set hilite of background button "Density" to false
  65.   set hilite of background button "Melting Point" to false
  66.   set hilite of background button "Boiling Point" to false
  67. end mouseUp
  68.  
  69.  
  70.  
  71. -- part 6 (button)
  72. -- low flags: 00
  73. -- high flags: A006
  74. -- rect: left=202 top=64 right=90 bottom=320
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 1
  78. -- font id: 0
  79. -- text size: 12
  80. -- style flags: 0
  81. -- line height: 16
  82. -- part name: Atomic Weight
  83. ----- HyperTalk script -----
  84. on mouseUp
  85.   Global sortName
  86.   Global sortName2
  87.   put "AtomicWt" into sortName
  88.   put "Atomic Weight" into sortName2
  89.   set hilite of background button "Atomic Number" to false
  90.   set hilite of background button "Atomic Radius" to false
  91.   set hilite of background button "Gram Atomic Vol." to false
  92.   set hilite of background button "Rel. Electroneg." to false
  93.   set hilite of background button "First Ioniz. Pot." to false
  94.   set hilite of background button "Elect. Resistivity" to false
  95.   set hilite of background button "Density" to false
  96.   set hilite of background button "Melting Point" to false
  97.   set hilite of background button "Boiling Point" to false
  98. end mouseUp
  99.  
  100.  
  101.  
  102. -- part 7 (button)
  103. -- low flags: 00
  104. -- high flags: A006
  105. -- rect: left=202 top=89 right=112 bottom=316
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 0 / 0
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: Atomic Radius
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   Global sortName
  117.   Global sortName2
  118.   put "AtomicRadius" into sortName
  119.   put "Atomic Radius" into sortName2
  120.   set hilite of background button "Atomic Weight" to false
  121.   set hilite of background button "Atomic Number" to false
  122.   set hilite of background button "Gram Atomic Vol." to false
  123.   set hilite of background button "Rel. Electroneg." to false
  124.   set hilite of background button "First Ioniz. Pot." to false
  125.   set hilite of background button "Elect. Resistivity" to false
  126.   set hilite of background button "Density" to false
  127.   set hilite of background button "Melting Point" to false
  128.   set hilite of background button "Boiling Point" to false
  129.  
  130. end mouseUp
  131.  
  132.  
  133.  
  134. -- part 8 (button)
  135. -- low flags: 00
  136. -- high flags: A006
  137. -- rect: left=202 top=111 right=134 bottom=337
  138. -- title width / last selected line: 0
  139. -- icon id / first selected line: 0 / 0
  140. -- text alignment: 1
  141. -- font id: 0
  142. -- text size: 12
  143. -- style flags: 0
  144. -- line height: 16
  145. -- part name: Gram Atomic Vol.
  146. ----- HyperTalk script -----
  147. on mouseUp
  148.   Global sortName
  149.   Global sortName2
  150.   put "GAV" into sortName
  151.   put "Gram Atomic Vol." into sortName2
  152.   set hilite of background button "Atomic Weight" to false
  153.   set hilite of background button "Atomic Radius" to false
  154.   set hilite of background button "Atomic Number" to false
  155.   set hilite of background button "Rel. Electroneg." to false
  156.   set hilite of background button "First Ioniz. Pot." to false
  157.   set hilite of background button "Elect. Resistivity" to false
  158.   set hilite of background button "Density" to false
  159.   set hilite of background button "Melting Point" to false
  160.   set hilite of background button "Boiling Point" to false
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 9 (button)
  166. -- low flags: 00
  167. -- high flags: A006
  168. -- rect: left=202 top=133 right=156 bottom=333
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: Rel. Electroneg.
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   Global sortName
  180.   Global sortName2
  181.   put "RelElectro" into sortName
  182.   put "Rel. Electroneg." into sortName2
  183.   set hilite of background button "Atomic Weight" to false
  184.   set hilite of background button "Atomic Radius" to false
  185.   set hilite of background button "Gram Atomic Vol." to false
  186.   set hilite of background button "Atomic Number" to false
  187.   set hilite of background button "First Ioniz. Pot." to false
  188.   set hilite of background button "Elect. Resistivity" to false
  189.   set hilite of background button "Density" to false
  190.   set hilite of background button "Melting Point" to false
  191.   set hilite of background button "Boiling Point" to false
  192. end mouseUp
  193.  
  194.  
  195.  
  196. -- part 10 (button)
  197. -- low flags: 00
  198. -- high flags: A006
  199. -- rect: left=202 top=155 right=178 bottom=334
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 0 / 0
  202. -- text alignment: 1
  203. -- font id: 0
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: First Ioniz. Pot.
  208. ----- HyperTalk script -----
  209. on mouseUp
  210.   Global sortName
  211.   Global sortName2
  212.   put "FIP" into sortName
  213.   put "First Ionization Pot." into sortName2
  214.   set hilite of background button "Atomic Weight" to false
  215.   set hilite of background button "Atomic Radius" to false
  216.   set hilite of background button "Gram Atomic Vol." to false
  217.   set hilite of background button "Rel. Electroneg." to false
  218.   set hilite of background button "Atomic Number" to false
  219.   set hilite of background button "Elect. Resistivity" to false
  220.   set hilite of background button "Density" to false
  221.   set hilite of background button "Melting Point" to false
  222.   set hilite of background button "Boiling Point" to false
  223. end mouseUp
  224.  
  225.  
  226.  
  227. -- part 11 (button)
  228. -- low flags: 00
  229. -- high flags: A006
  230. -- rect: left=202 top=177 right=200 bottom=335
  231. -- title width / last selected line: 0
  232. -- icon id / first selected line: 0 / 0
  233. -- text alignment: 1
  234. -- font id: 0
  235. -- text size: 12
  236. -- style flags: 0
  237. -- line height: 16
  238. -- part name: Elect. Resistivity
  239. ----- HyperTalk script -----
  240. on mouseUp
  241.   Global sortName
  242.   Global sortName2
  243.   put "ElectrResist" into sortName
  244.   put "Electrical Resistivity" into sortName2
  245.   set hilite of background button "Atomic Weight" to false
  246.   set hilite of background button "Atomic Radius" to false
  247.   set hilite of background button "Gram Atomic Vol." to false
  248.   set hilite of background button "Rel. Electroneg." to false
  249.   set hilite of background button "First Ioniz. Pot." to false
  250.   set hilite of background button "Atomic Number" to false
  251.   set hilite of background button "Density" to false
  252.   set hilite of background button "Melting Point" to false
  253.   set hilite of background button "Boiling Point" to false
  254. end mouseUp
  255.  
  256.  
  257.  
  258. -- part 12 (button)
  259. -- low flags: 00
  260. -- high flags: A006
  261. -- rect: left=202 top=199 right=222 bottom=301
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 0 / 0
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 12
  267. -- style flags: 0
  268. -- line height: 16
  269. -- part name: Density
  270. ----- HyperTalk script -----
  271. on mouseUp
  272.   Global sortName
  273.   Global sortName2
  274.   put "Density" into sortName
  275.   put "Density" into sortName2
  276.   set hilite of background button "Atomic Weight" to false
  277.   set hilite of background button "Atomic Radius" to false
  278.   set hilite of background button "Gram Atomic Vol." to false
  279.   set hilite of background button "Rel. Electroneg." to false
  280.   set hilite of background button "First Ioniz. Pot." to false
  281.   set hilite of background button "Elect. Resistivity" to false
  282.   set hilite of background button "Atomic Number" to false
  283.   set hilite of background button "Melting Point" to false
  284.   set hilite of background button "Boiling Point" to false
  285. end mouseUp
  286.  
  287.  
  288.  
  289. -- part 13 (button)
  290. -- low flags: 00
  291. -- high flags: A006
  292. -- rect: left=202 top=243 right=266 bottom=320
  293. -- title width / last selected line: 0
  294. -- icon id / first selected line: 0 / 0
  295. -- text alignment: 1
  296. -- font id: 0
  297. -- text size: 12
  298. -- style flags: 0
  299. -- line height: 16
  300. -- part name: Melting Point
  301. ----- HyperTalk script -----
  302. on mouseUp
  303.   Global sortName
  304.   Global sortName2
  305.   put "MeltPt" into sortName
  306.   put "Melting Point" into sortName2
  307.   set hilite of background button "Atomic Weight" to false
  308.   set hilite of background button "Atomic Radius" to false
  309.   set hilite of background button "Gram Atomic Vol." to false
  310.   set hilite of background button "Rel. Electroneg." to false
  311.   set hilite of background button "First Ioniz. Pot." to false
  312.   set hilite of background button "Elect. Resistivity" to false
  313.   set hilite of background button "Density" to false
  314.   set hilite of background button "Atomic Number" to false
  315.   set hilite of background button "Boiling Point" to false
  316. end mouseUp
  317.  
  318.  
  319.  
  320. -- part 15 (button)
  321. -- low flags: 00
  322. -- high flags: A003
  323. -- rect: left=199 top=8 right=28 bottom=333
  324. -- title width / last selected line: 0
  325. -- icon id / first selected line: 0 / 0
  326. -- text alignment: 1
  327. -- font id: 0
  328. -- text size: 12
  329. -- style flags: 0
  330. -- line height: 16
  331. -- part name: Sort
  332. ----- HyperTalk script -----
  333. on mouseUp
  334.   Global sortName
  335.   Global sortName2
  336.   Global s
  337.   Global asc
  338.   Global desc
  339.   Global together
  340.   Global txt
  341.   Global qte
  342.   put userLevel into Level
  343.   set userLevel to 5
  344.   put "sort" into s
  345.   put "ascending" into asc
  346.   put "descending" into desc
  347.   put "numeric by background field" into txt
  348.  
  349.   answer "sort values-" with "low to high" or "high to low" or "cancel"
  350.  
  351.   If it = "low to high" then
  352.     put s && asc && txt && numToChar(34) & sortName & numToChar(34) into together
  353.     doSort
  354.   Else
  355.     If it = "high to low" then
  356.       put s && desc && txt && numToChar(34) & sortName & numToChar(34) into together
  357.       doSort
  358.     End if
  359.   End if
  360.   Set userLevel to 1
  361. End mouseUp
  362.  
  363. On doSort
  364.   Global together
  365.   Global sortName2
  366.  
  367.   set cursor to 4
  368.   lock screen
  369.  
  370.   do together
  371.  
  372.   go to bkgnd "elementinfo"
  373.   choose eraser tool
  374.   drag from 199,302 to 325,302
  375.   choose text tool
  376.   click at 261,304
  377.   set textSize to 12
  378.   set textFont to New York
  379.   set textStyle to plain
  380.   set textAlign to Center
  381.   type sortName2
  382.   choose browse tool
  383.   set userlevel to 1
  384.  
  385.   repeat while the short name of this card is "*Table" or the short name of this card is "ar*" or the short name of this card is "nr" or the short name of this card is "Ad" or the short name of this card is "Noble" or the short name of this card is "Halogen" or the short name of this card is "Metalloid" or the short name of this card is "Alkali" or the short name of this card is "Constants" or the short name of this card is "sortControl" or the short name of this card is "*Table" or the short name of this card is "elementInfoHelp"
  386.     go to next card
  387.   end repeat
  388.  
  389.  
  390.  
  391.   unlock screen
  392.   -- cursor changes back to hand
  393. End doSort
  394.  
  395.  
  396.  
  397. -- part 18 (field)
  398. -- low flags: 01
  399. -- high flags: 4001
  400. -- rect: left=428 top=56 right=74 bottom=510
  401. -- title width / last selected line: 0
  402. -- icon id / first selected line: 0 / 0
  403. -- text alignment: 65535
  404. -- font id: 0
  405. -- text size: 12
  406. -- style flags: 0
  407. -- line height: 16
  408. -- part name: BoilPt2
  409.  
  410.  
  411. -- part 19 (field)
  412. -- low flags: 01
  413. -- high flags: 4000
  414. -- rect: left=425 top=107 right=125 bottom=512
  415. -- title width / last selected line: 0
  416. -- icon id / first selected line: 0 / 0
  417. -- text alignment: 65535
  418. -- font id: 0
  419. -- text size: 12
  420. -- style flags: 0
  421. -- line height: 16
  422. -- part name: SpecHeat
  423.  
  424.  
  425. -- part 20 (field)
  426. -- low flags: 01
  427. -- high flags: 4001
  428. -- rect: left=428 top=73 right=91 bottom=510
  429. -- title width / last selected line: 0
  430. -- icon id / first selected line: 0 / 0
  431. -- text alignment: 65535
  432. -- font id: 0
  433. -- text size: 12
  434. -- style flags: 0
  435. -- line height: 16
  436. -- part name: MeltPt2
  437.  
  438.  
  439. -- part 21 (field)
  440. -- low flags: 01
  441. -- high flags: 4000
  442. -- rect: left=423 top=140 right=157 bottom=511
  443. -- title width / last selected line: 0
  444. -- icon id / first selected line: 0 / 0
  445. -- text alignment: 65535
  446. -- font id: 0
  447. -- text size: 12
  448. -- style flags: 0
  449. -- line height: 16
  450. -- part name: ThermCond
  451.  
  452.  
  453. -- part 22 (field)
  454. -- low flags: 01
  455. -- high flags: 4000
  456. -- rect: left=411 top=188 right=206 bottom=511
  457. -- title width / last selected line: 0
  458. -- icon id / first selected line: 0 / 0
  459. -- text alignment: 65535
  460. -- font id: 0
  461. -- text size: 12
  462. -- style flags: 0
  463. -- line height: 16
  464. -- part name: Linear
  465.  
  466.  
  467. -- part 23 (field)
  468. -- low flags: 01
  469. -- high flags: 4000
  470. -- rect: left=444 top=259 right=275 bottom=511
  471. -- title width / last selected line: 0
  472. -- icon id / first selected line: 0 / 0
  473. -- text alignment: 65535
  474. -- font id: 0
  475. -- text size: 12
  476. -- style flags: 0
  477. -- line height: 16
  478. -- part name: TenStr
  479.